home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The 640 MEG Shareware Studio 2
/
The 640 Meg Shareware Studio CD-ROM Volume II (Data Express)(1993).ISO
/
utility
/
blrmu13.zip
/
MAGYELO.ASM
< prev
next >
Wrap
Assembly Source File
|
1991-04-13
|
2KB
|
65 lines
page ,132
title magyelo ( magenta bak, brdr - yellow crsr ) 04/13/91 - 02:15 pm
;
code segment para public 'code'
;
org 256
;
assume cs:code
;
magyelo proc far
;
;*-----------------------
;* set border color
;*-----------------------
sbc:
mov ah,11 ; set color palette fct
mov bh,0 ; text mode
mov bl,6 ; border = brn
int 16
;*-------------------------
;* set cursor position
;*-------------------------
scp:
mov ah,2 ; set cursor position fct
mov bh,0 ; page 0
mov dh,0 ; row 0
mov dl,0 ; col 0
int 16
;*----------------------------------
;* write character and attribute
;*----------------------------------
wcaa:
mov ah,9 ; write char and attr fct
mov al,32 ; char = space
mov bh,0 ; page 0
mov bl,94 ; x'5e' ; attr = magenta back, yelo crsr
mov cx,2000 ; 25 * 80 = full screen
int 16
;
exit: mov al,0 ; ret code = 0
mov ah,76 ; term with ret code
int 33
;
magyelo endp
;
code ends
;
end magyelo
;
;---------------------------------------
; Color Chart
;---------------------------------------
;
; Black = 00 Light Black = 08
; Blue = 01 Light Blue = 09
; Green = 02 Light Green = 10
; Cyan = 03 Light Cyan = 11
; Red = 04 Light Red = 12
; Magenta = 05 Light Magenta = 13
; Brown = 06 Light Brown = 14 ( Yellow )
; White = 07 Light White = 15
;
;----------------------------------------
;